home *** CD-ROM | disk | FTP | other *** search
/ CD/PC Actual 16 / PC Actual CD 16.iso / cdactual / LECTORES / nibble.exe / MODULE1.TXT < prev    next >
Encoding:
Text File  |  1997-08-28  |  759 b   |  37 lines
  1.  
  2. Global Altura, Anchura As Currency
  3. Global Segunda_Pasada As Integer
  4. Global Const flecha_arriba = 38, flecha_abajo = 40
  5. Global Const flecha_der = 39, flecha_izq = 37
  6.  
  7. Global x1nib As Integer
  8. Global x2nib As Integer
  9. Global y1nib As Integer
  10. Global y2nib As Integer
  11.  
  12.  
  13. Global alturanib, anchuranib As Integer
  14. Global velocidad As Integer
  15. Global direccion As Integer '0 arriba, 1 abajo
  16.                             '2 derecha,3 izquierda
  17.  
  18.  
  19. Global num_selec As Integer
  20. Global numero As String
  21.  
  22.  
  23. Global color_aux
  24.  
  25.   
  26. Global x_aleatoria As Integer
  27. Global y_aleatoria As Integer
  28.  
  29. Global array_posi(1 To 4, 0 To 100) As Integer
  30. Global posicion As Integer
  31. Global indice As Integer
  32.  
  33. Global n_vueltas As Integer
  34.  
  35. Global nivel As Integer
  36.  
  37.